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NOTES ON HI-RES GRAPHICS 
ROUTINES IN APPLESOFT 

by C. K. Mesztenyi 
Washington Apple Pi 



Checking out the entry points given 
by J. Crossley in the article "APPLE- 
SOFT INTERNAL ENTRYPOINTS" in 
the March/April 1980 Apple Or- 
chard, I found the given entry 
points were 4 bytes off from the 
given ones in our APPLE II Plus. Fur- 
thermore, after checking out the 
routines in more detail, I thought to 
share my experiments with other 
APPLE II Plus owners interested in 
machine language programming. In 
the first section, I describe the 
essential data storage area, in the 
second I give the entry points of the 
subroutines somewhat more detail- 
ed than in the above article, and in 
the last section I give some listings 
of instructions following the entry 
points so that one could identify it 
for different versions of Applesoft. 



1. DATA STRUCTURE 

There are four data in five mem- 
ory locations which specify a point 
on the high resolution screen 
(whether the screen is displayed or 
not, is irrelevant). I call these data 
collectively as external cursor data. 
The five memory locations, and 
their contents are as follows: 



$E0: Low order bits of the hori- 
zontal screen coordinate 

$E1: High order bit of the hori- 
zontal screen coordinate 

$E2: Vertical screen coordinate 

$E4: Color masking word from 
the color table ($F6F6- 
$F6FD) 

$E6: Page indicator ($20 for 
Page 1 , $40 for Page 2) 



I have called the above set of data 
as external cursor data since the ac- 
tual point plot is performed by the 
following five instructions: 



LDA 


$1C 


EOR 


($26),Y 


AND $30 


EOR 


($26),Y 


STA 


($26),Y 



which uses data located at $1C, 
$26, $27, register Y and $30. The 
contents of register Y are always 
picked up from location $E5 prior 
to the above instructions, thus we 
may call the data in the following 
five locations as internal cursor 
data: 



$1C: The color masking byte 
shifted for odd address and 
none black or white, un- 
changed otherwise. 

$26, $27: (Low, high order) ad- 
dress of the byte corre- 
sponding to trie page, verti- 
cal coordinate and leftmost 
seven points of the screen, 
(register Y): The integer 
part of the horizontal 
screen coordinate divided 
by 7. 

$30: The bit position taken from 
Bit Position Table corre- 
sponding to the remainder 
of the horizontal coordi- 
nate divided by 7. 



$E5 



These two cursor data (external 
and internal) are equivalent in the 
sense that given one, the other can 
be derived from it. There would be 
no need to make any distinction if 
they would correspond to each 
other all the time, but unfortu- 
nately, this is not always the case, 
e.g. the following sequence of 
BASIC instructions: 



HCOLOR=1 
HPLOT0,0TO 10,10 
HCOLOR-2 
HPLOTTO 10,50 



plots two lines, (0,0) to (10,10) and 
(10,10) to (10,50), both with color 
1, i.e. HCOLOR = 2 has no effect. 
Actually it resets the color code in 
$E4 but it does not change $1C, and 
the statement HPLOT TO picks up 
whatever was left in $1C. 

A machine language programmer 
can write his/her own graphics rou- 
tines which takes time and uses 
sometimes much-needed memory 
space. Thus using the available pro- 
grams in Applesoft ROM can be ad- 
vantageous. If execution time is also 
important, as in the case of anima- 
tion, then one should concentrate 
only on the internal cursor data, 
and modify the external cursor only 
when it is necessary. The entry 
points INTX and INTY, provide the 
basic routines for incremental plot- 
ting which are not available directly 
in BASIC. Also, modifying the exter- 
nal cursor coordinates allows the 
use of H LINE with off-set. 
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2. ENTRY POINTS IN APPLESOFT 


screen coordinate X by 


DECRY ($F4D5): The routine modi- 






one. Upon entry, if the 


fies the internal cursor 






N-flag is zero (positive) 


data by decrementing the 




Page and Color: 


then it increments; if N 


vertical screen coordinate 






is set (negative) then it 


by 1 (see INTY). 






decrements. The modi- 


INCRY ($F504): The routine modi- 






fication has a wrap 


fies the internal cursor 




HCR2 ($F3D8): Displays page 2 


around feature, i.e., in- 


data by incrementing the 




with all graphics mode, 


crementing/decrement- 


vertical coordinate by 1 




sets $E6 to $40, clears 


ing at the extreme sides 


(see INTY). 




page 2 (black) and sets 


of the screen defined 


IPOSN <$F5CB): Sets the external 




$1Ctozero (black 1). 


by the internal cursor 


cursor data in $E0, $E1, 




HGR ($F3E2): Displays page 1 in 


causes it to come back 


$E2 equivalent to the in- 




mixed mode, sets $E6 to 


on the other side. The 


ternal cursor coordinate 




$20, clears page 1 (black) 


routine assumes that re- 


data. 




and sets $1C to zero 


gister Y corresponds to 






(black 1). 


$E5 upon entry, and 






BKGND ($F3F4): Clears the page 


leaves the routine cor- 






defined by $E6 to the 


rectly modified if 






color defined by the con- 


necessary. 


Plotting Entries: 




tents of register A, which 








should be one from the 


Upon testing the N-flag 






Color Masking Table. Also 


the routine jumps to 






stores register A in $1C. 


DECRX or INCRX. 


HPLOT ($F457): Assumes input data 




HCOLOR ($F6F0): Assumes regis- 




in the registers as 




ter X contains the color 




HPOSN: 




index (0 to 7). The rou- 
tine picks up the appro- 
priate color code from 


DECRX ($F467): The routine modi- 


register X: low order bits 
of horizontal screen 
coordinate, 




the Color Masking Table 


fies the internal cursor 




and stores it in $E4. 


data by decrementing 


register Y: high order bit 






the horizontal screen 


of horizontal screen 






coordinate by 1 (see 


coordinate, 




Positioning Entries: 


INTX). 








INCRX ($F48A): The routine modi- 


register A: vertical screen 






fies the internal cursor 


coordinate. 




HPOSN ($F411): Assumes the in- 


data by incrementing 


The routine calls HPOSN 




put upon entry in the re- 


the horizontal screen 


with the above data, then 




gisters as: 


coordinate by 1 (see 


goes to PLOT. 




register X- low order bits 
of the horizontal screen 


INTX). 
INTY ($F4D3): Modifies the inter- 


PLOT ($F45A): The routine exe- 
cutes the five instructions 




coordinate 


nal cursor data in $26, 


listed in the beginning of 






$27, so that it corre- 


the article which plots a 




register Y-high order bit 


sponds to incrementing/ 


point using the internal 




of the horizontal screen 


decrementing the verti- 


cursor data. If this entry is 




coordinate, 


cal screen coordinate 


used directly, then the 




register A -vertical screen 
coordinate. 


by one. Upon entry, 
the N-flag is checked, 
and if it is set (negative) 


user should make sure 
that register Y contains 
the data from $E5. 




The routine stores the re- 


then goes to INCRY to 


HLINE ($F53A): The routine as- 




gisters in $E0, $E1 and 


increment by one, if it 


sumes input in the 




$E2. Then, using $E6, sets 


is not set (positive) then 


registers: 




$26, $27, $30 and $E5 


goes to DECRY to de- 


register A: low order bits 




together with register Y, 


crement by one. Note 


of horizontal screen 




and sots $1C to the con- 


that the sign convention 


coordinate, 




tents of $E4. Thus this 


is used opposite of 






routine makes the internal 


INTX. These entries also 


register X: high order bit 




cursor equivalent to the 


have the wraparound 


of horizontal screen 




external one. 


features, i.e. if the in- 


coordinate, 




INTX ($F465): Modifies the internal 


crementation/decre- 


register Y: vertical screen 




cursor data in $1C, $E5, 


mentation causes the 


coordinate. 




registei Y and $30 so 


cursor to leave the 






that it corresponds to 


screen on the bottom/ 






incrementing/decre- 


top, then it comes back 


(Note that it is in different 




menting the horizontal 


on the top/bottom. 


order than (HPOSN.) 
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The routine draws a line 
from the internal cursor 
position to the point de- 
fined by the input. Upon 
exit, it leaves the external 
cursor data corresponding 
to the input, the internal 
cursor data corresponding 
to the last plot point of 
the line. If the internal 
and external cursor data 
were not equivalent, then 
an off-set occurs. This can 
be visualized as follows: 

Draw a line segment 
from the external cursor 
coordinates to the input 
coordinates. Now move 
this line segment parallel 
to itself so that the end- 
point at the external cur- 
sor position gets into the 
internal cursor position. 
This is the actual line seg- 
ment which will be 
drawn. If it gets outside of 
the screen, then a wrap- 
around occurs, i.e. it 
comes back on the oppo- 
site side of the screen. 



APPENDIX 

The first few instructions are listed 
for each entry point so that one 
could identify them using the Moni- 
tor list feature. 



Bit Position Table: 



$F5B2: 
$F5B3: 
$F5B4: 
$F5B5: 
$F5B6: 
$F5B7: 
$F5B8: 



$81=10000001 
$82 = 10000010 
$84-10000100 
$88-10001000 
$90-10010000 
$A0- 101 00000 
$C0= 11000000 



Color Masking Table: 



$F6F6: 
$F6F7: 
$F6F8: 
$F6F9: 
$F6FA: 
$F6FB: 
$F6FC: 
JF6FD: 

HGR2: 



$00 = 00000000 (black I) 

$2A = 00101010 

$55 = 01010101 

$7F — 01 111111 (white I) 

$80-10000000 (black II) 

$AA=10101010 

$D5 = 1 1010101 

$FF = 1 11 11111 (white II) 



$F3D8: 



BIT $C055 
BIT $C052 
LDA #$40 
BNE $F3EA 



HGR: 



BKGND: 



$F3E2: 



$F3F4: 



HCOLOR: $F6F0: 



HPOSN: $F411: 



IPOSN: 



$F5CB: 



INTX: 
DECRX: 



INCRX: 



INTY: 
DECRY: 



INCRY: 



HPLOT: 



$F465: 
$F467: 



$F48A: 



$F4D3: 
$F4D5: 



$F505: 



$F457: 



HLINE: 



$F53A: 



LDA #$20 
BIT $C054 
BIT $C053 
STA $E6 

STA $1C 
LDA $E6 
STA $1 B 
LDY $#00 

LDA $F6F6,X 
STA $E4 
RTS 



STA $E2 
STX $E0 
STY $E1 
PHA 

AND #$C0 
STA $26 



LDA $26 
ASL 

LDA $27 
AND #$03 
ROL 
ORA $26 



BPL SF48A 
LDA $30 
LSR 

BCS $F471 
EOR #$C0 



LDA $30 
ASL 

EOR #$80 
BMI $F46E 



BMI $F505 
CLC 

LDA $27 
BIT $F5B9 
PNE $F4FF 



CLC 

LDA $27 
ADC #$04 
BIT $F5B9 



)SR $F411 
LDA $1C 
EOR ($26), Y 
AND $30 
EOR ($26), Y 
STA ($26),Y 
RTS 
PHA 
SEC 

SPC $E0 
PHA 
TXA 
SPC $E1 



AN APPLE U QUICKIE 

by Gordon Stallings 
Tulsa Computer Society 



Here is a simple program which 
has been in use by the TCS Apple 
Users for the past year, and which 
should be more wic-ely known: 

To copy a cassette tape from one 
recorder to another, you can use 
the Apple II as an intermediary to 
restore the signal levels. 













Recorder #1 
(playback) 


"mon" 














" in " rl Aoole II l " out " 






j .^PPlo , 












"mic" 


Recorder #2 
(record) 















Put this program into the Apple II: 

0000 20 FD FC JSR $FCFD 
0003 AD 20 CO LDA $C020 
0006 4C 00 00 )MP $0000 

Start the program'. *0G 

As long as this program is run- 
ning, any signal received from re- 
corder #1 will be sent to recorder 
#2. For best results, the following 
tips should be observed: 

1. Be sure that Recorder #1 is set 
up to reliably read the tape which 
you are wanting to copy- volume, 
tone, and head alignment must be 
set so that the Apple can read the 
tape. 

2. Recorder #2 should have cor- 
rect head alignment so that the new 
tape will be compatible with other 
machines. 



HOW IT WORKS 

The JSR calls subroutine $FCFD in 
the Monitor ROM, which watches 
the cassette input port waiting for a 
change of state, which indicates a 
zero-crossing on the playback tape. 
When the transition occurs, the 
subroutine RETURNS. The LDA 
$C020 toggles the cassette output 
port, recording a transition on the 
new tape. The JMP closes a pro- 
gram loop which can only be 
broken by RESET. 
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